10 REM MACHINE LANGUAGE SPRITE FILE LOADER - USE DESIRED SPRITE FILENAME IN 40
20 S=128*64:M=49152
30 FORA=MTOM+26:READB:POKEA,B:NEXT:H=INT(S/256):POKE253,S-H*256:POKE255,H
40 OPEN1,8,4,"FILENAME":SYSM:CLOSE1
50 DATA 162,1,32,198,255,32,228,255,164,253,145,254,192,255,208,2,230,255,230
60 DATA 253,165,144,240,237,76,204,255
70 REM S=)STARTING SPRITE BLOCK)*64
80 REM M=ML STARTING ADDRESS : ML=828,  FOR EXAMPLE